package cn.mugutu.finance.utils;

import java.beans.Beans;
import java.lang.annotation.Annotation;
import java.lang.reflect.Field;
import java.lang.reflect.InvocationTargetException;
import java.lang.reflect.Method;
import java.lang.reflect.Modifier;
import java.lang.reflect.Type;
import java.util.ArrayList;
import java.util.Arrays;
import java.util.List;

import javax.persistence.Id;

public class TypeUtils {
    /**
     * 获取clazz实体类的主键类型
     * @param clazz
     * @return
     */
    public static Class<?> getPkClass(Class<?> clazz) {
        Class<?> pkClazz = null;
        if (clazz == null) {
            return null;
        }
        List<Method> methods = getBeanGetterMethods(clazz);
        for (Method method : methods) {
            Id id = (Id) method.getAnnotation(Id.class);
            if (id != null) {
                pkClazz = method.getReturnType();
                PrintUtil.print("主键类型 ：" + pkClazz);
                break;
            }
        }
        if (pkClazz == null) {
            List<Field> fields = getBeanFileds(clazz);
            for (Field field : fields) {
                Id id = (Id) field.getAnnotation(Id.class);
                if (id != null) {
                    pkClazz = field.getType();
                    PrintUtil.print("主键类型 ：" + pkClazz);
                    break;
                }
            }
        }
        return pkClazz;
    }

    /**
     * 获取主键的字段
     * @param clazz
     * @return
     */
    public static Field getPkField(Class<?> clazz) {
        if (clazz == null) {
            return null;
        }
        List<Method> methods = getBeanGetterMethods(clazz);
        for (Method method : methods) {
            //PrintUtil.print(clazz.getSimpleName()+" , "+method.getName());
            Id id = method.getAnnotation(Id.class);
            if (id != null) {
                String fieldName = method.getName().replaceFirst("get", "").replaceFirst("is", "");
                fieldName = fieldName.substring(0, 1).toLowerCase() + fieldName.substring(1);
                return getDeclaredField(clazz, fieldName);
            }
        }
        List<Field> fields = getBeanFileds(clazz);
        for (Field field : fields) {
            Id id = getDeclaredAnnotation(field, Id.class);
            if (id != null) {
                PrintUtil.print(field.getName());
                return field;
            }
        }
        //PrintUtil.print("not found");
        return null;
    }

    public static boolean isIntClass(Type type) {
        return (isPrimitiveClassByClass(type, Integer.TYPE)) || (isPrimitiveClassByClass(type, Integer.class));
    }

    public static boolean isLongClass(Type type) {
        return (isPrimitiveClassByClass(type, Long.TYPE)) || (isPrimitiveClassByClass(type, Long.class));
    }

    public static boolean isPrimitiveClassByClass(Type type, Class<?> clazz) {
        if (type == null) { return false; }
        return type.toString().equals(clazz.toString());
    }

    public static boolean isClassObject(Object object, Class<?> clazz) {
        if (object == null) { return false; }
        return Beans.isInstanceOf(object, clazz);
    }

    public static boolean isNumber(Object object) {
        return isClassObject(object, Number.class);
    }

    /**
     * 循环向上获取
     * 获取该类型的所有字段名称列表，不包括final修饰的字段
     * @param clazz 类型
     * @return
     */
    public static List<String> getBeanPropertyNames(Class<?> clazz) {
        List<String> results = new ArrayList<String>();

        for (; clazz != Object.class; clazz = clazz.getSuperclass()) {
            Field[] fields = clazz.getDeclaredFields();
            for (int i = 0; fields != null && i < fields.length; i++) {
                Field field = fields[i];
                if (Modifier.isStatic(field.getModifiers()) || Modifier.isFinal(field.getModifiers())) {
                    continue;
                }
                results.add(field.getName());
            }
        }
        return results;
    }

    public static List<Field> getBeanFileds(Class<?> clazz) {
        List<Field> results = new ArrayList<Field>();
        for (; clazz != Object.class; clazz = clazz.getSuperclass()) {
            Field[] fields = clazz.getDeclaredFields();
            for (int i = 0; fields != null && i < fields.length; i++) {
                Field field = fields[i];
                if (Modifier.isStatic(field.getModifiers()) || Modifier.isFinal(field.getModifiers())) {
                    continue;
                }
                results.add(field);
            }
        }
        return results;
    }

    /**
     * 获取该类的所有getter方法
     * @param clazz
     * @return
     */
    public static List<Method> getBeanGetterMethods(Class<?> clazz) {
        List<Method> methods = new ArrayList<Method>();
        methods.addAll(Arrays.asList(clazz.getDeclaredMethods()));
        Class<?> superClazz = clazz.getSuperclass();
        if (!superClazz.isInterface() && superClazz != Object.class) {
            methods.addAll(Arrays.asList(superClazz.getDeclaredMethods()));
        }
        List<Method> results = new ArrayList<Method>();
        for (Method method : methods) {
            if ((method.getName().startsWith("get") || method.getName().startsWith("is")) && !Modifier.isFinal(method.getModifiers())) {
                results.add(method);
            }
        }
        return results;
    }

    public static boolean isNotBaseType(Type type) {
        String typeStr = type.toString();
        if (typeStr.matches("(int|byte|short|long|boolean|char|float|double)")) {
            return false;
        }
        if (typeStr.matches("class\\sjava\\.lang\\.String")) {
            return false;
        }
        if (typeStr.matches("class\\sjava\\.util\\.Date")) {
            return false;
        }
        return true;
    }

    /**
     * 根据属性名设置对应Field的值
     * @param name 属性名
     * @param o 赋值对象
     * @param 值
     * @return 操作结果
     */
    public static boolean setFieldByName(String name, Object o, Object value) {
        try {
            Field f = getDeclaredField(o, name);
            if (f != null) {
                f.setAccessible(true);
                f.set(o, value);
            }
        } catch (Exception e) {
            e.printStackTrace();
            PrintUtil.print("赋值失败:" + o.getClass().getSimpleName() + "的" + name + ":" + value);
            return false;
        }
        return true;
    }

    /**
     * 拷贝属性值
     * @param src
     * @param des
     */
    public static void copyProperties(Object src, Object des) {
        List<String> srcFieldNames = getBeanPropertyNames(src.getClass());
        List<Field> desFields = getBeanFileds(des.getClass());
        for (Field field : desFields) {
            field.setAccessible(true);
            if (srcFieldNames.contains(field.getName())) {
                try {
                    Object obj = getFieldValue(src, field.getName());
                    if (obj == null) {
                        continue;
                    }
                    setFieldByName(field.getName(), des, obj);
                } catch (IllegalArgumentException e) {
                    PrintUtil.print("拷贝属性时发生异常");
                    continue;
                } catch (Exception e) {
                    PrintUtil.print("拷贝属性时发生未知异常");
                    continue;
                }
            }
        }
    }

    public static void copyProperties(Object src, Object des, String... ignoreFields) {
        List<String> srcFieldNames = getBeanPropertyNames(src.getClass());
        List<Field> desFields = getBeanFileds(des.getClass());
        List<String> notcontains = Arrays.asList(ignoreFields);
        for (Field field : desFields) {
            field.setAccessible(true);
            if (srcFieldNames.contains(field.getName()) && (notcontains == null || !notcontains.contains(field.getName()))) {
                try {
                    Object obj = getFieldValue(src, field.getName());
                    if (obj == null) {
                        continue;
                    }
                    setFieldByName(field.getName(), des, obj);
                } catch (IllegalArgumentException e) {
                    PrintUtil.print("拷贝属性时发生异常");
                    continue;
                } catch (Exception e) {
                    PrintUtil.print("拷贝属性时发生未知异常");
                    continue;
                }
            }
        }
    }

    /**
     * 循环向上转型, 获取对象的 DeclaredMethod
     * @param object : 子类对象
     * @param methodName : 父类中的方法名
     * @param parameterTypes : 父类中的方法参数类型
     * @return 父类中的方法对象
     */
    public static Method getDeclaredMethod(Object object, String methodName, Class<?>... parameterTypes) {
        Method method = null;

        for (Class<?> clazz = object.getClass(); clazz != Object.class; clazz = clazz.getSuperclass()) {
            try {
                method = clazz.getDeclaredMethod(methodName, parameterTypes);
                return method;
            } catch (Exception e) {
                //这里甚么都不要做！并且这里的异常必须这样写，不能抛出去。
                //如果这里的异常打印或者往外抛，则就不会执行clazz = clazz.getSuperclass(),最后就不会进入到父类中了

            }
        }

        return null;
    }

    /**
     * 直接调用对象方法, 而忽略修饰符(private, protected, default)
     * @param object : 子类对象
     * @param methodName : 父类中的方法名
     * @param parameterTypes : 父类中的方法参数类型
     * @param parameters : 父类中的方法参数
     * @return 父类中方法的执行结果
     */
    public static Object invokeMethod(Object object, String methodName, Class<?>[] parameterTypes,
                                      Object[] parameters) {
        //根据 对象、方法名和对应的方法参数 通过反射 调用上面的方法获取 Method 对象
        Method method = getDeclaredMethod(object, methodName, parameterTypes);
        //抑制Java对方法进行检查,主要是针对私有方法而言
        method.setAccessible(true);
        try {
            if (null != method) {
                //调用object 的 method 所代表的方法，其方法的参数是 parameters
                return method.invoke(object, parameters);
            }
        } catch (IllegalArgumentException e) {
            e.printStackTrace();
        } catch (IllegalAccessException e) {
            e.printStackTrace();
        } catch (InvocationTargetException e) {
            e.printStackTrace();
        }
        return null;
    }

    /**
     * 循环向上转型, 获取对象的 DeclaredField
     * @param object : 子类对象
     * @param fieldName : 父类中的属性名
     * @return 父类中的属性对象
     */
    public static Field getDeclaredField(Object object, String fieldName) {
        Field field = null;
        Class<?> clazz = object.getClass();
        for (; clazz != Object.class; clazz = clazz.getSuperclass()) {
            try {
                field = clazz.getDeclaredField(fieldName);
                return field;
            } catch (Exception e) {
                //这里甚么都不要做！并且这里的异常必须这样写，不能抛出去。
                //如果这里的异常打印或者往外抛，则就不会执行clazz = clazz.getSuperclass(),最后就不会进入到父类中了
                //PrintUtil.print("出现获取属性字段异常");
            }
        }
        return null;
    }

    /**
     * 直接设置对象属性值, 忽略 private/protected 修饰符, 也不经过 setter
     * @param object : 子类对象
     * @param fieldName : 父类中的属性名
     * @param value : 将要设置的值
     */
    public static void setFieldValue(Object object, String fieldName, Object value) {
        //根据 对象和属性名通过反射 调用上面的方法获取 Field对象
        Field field = getDeclaredField(object, fieldName);
        //抑制Java对其的检查
        field.setAccessible(true);
        try {
            //将 object 中 field 所代表的值 设置为 value
            field.set(object, value);
        } catch (IllegalArgumentException e) {
            e.printStackTrace();
        } catch (IllegalAccessException e) {
            e.printStackTrace();
        }
    }

    /**
     * 直接读取对象的属性值, 忽略 private/protected 修饰符, 也不经过 getter
     * @param object : 子类对象
     * @param fieldName : 父类中的属性名
     * @return : 父类中的属性值
     */
    public static Object getFieldValue(Object object, String fieldName) {
        //根据 对象和属性名通过反射 调用上面的方法获取 Field对象
        Field field = getDeclaredField(object, fieldName);
        //抑制Java对其的检查
        field.setAccessible(true);
        try {
            //获取 object 中 field 所代表的属性值
            return field.get(object);
        } catch (Exception e) {
            e.printStackTrace();
        }
        return null;
    }

    /**
     * 获取范型接口中的类型,只能为List,Set
     * @param clazz
     * @return
     */
    public static Class<?> getPatternType(Type type) {
        //java.util.Set<com.police.evaluation.entity.system.Privilege>
        String typeName = type.toString();
        //PrintUtil.print(typeName);
        int startIndex = typeName.indexOf("<");
        int endIndex = typeName.indexOf(">");
        if (startIndex >= 0 && endIndex >= 0) {
            try {
                return Class.forName(typeName.substring(startIndex + 1, endIndex));
            } catch (ClassNotFoundException e) {
                e.printStackTrace();
                return null;
            }
        }
        return null;
    }

    public static Field getDeclaredField(Class<?> clazz, String fieldName) {
        Field field = null;
        for (; clazz != Object.class; clazz = clazz.getSuperclass()) {
            try {
                field = clazz.getDeclaredField(fieldName);
                return field;
            } catch (Exception e) {
                //这里甚么都不要做！并且这里的异常必须这样写，不能抛出去。
                //如果这里的异常打印或者往外抛，则就不会执行clazz = clazz.getSuperclass(),最后就不会进入到父类中了
                PrintUtil.print("出现获取属性字段异常" + fieldName);
            }
        }
        return null;
    }

    @SuppressWarnings("unchecked")
    public static <T> T getDeclaredAnnotation(Field field, Class<T> clazz) {
        Annotation[] annotations = field.getDeclaredAnnotations();
        for (int i = 0; i < annotations.length; i++) {
            if (annotations[i].getClass() == clazz) {
                return (T) annotations[i];
            }
        }
        return null;
    }
}
